home *** CD-ROM | disk | FTP | other *** search
/ Technotools / Technotools (Chestnut CD-ROM)(1993).ISO / database / do1beta / datetest.do < prev    next >
Text File  |  1991-05-08  |  330b  |  27 lines
  1. /*
  2.     test the dObject date conversion functions
  3. */
  4. ? date();
  5.  
  6. s = asString(date(),"YY.MM.DD");
  7. ? s;
  8.  
  9. s = asString(date(),"YY.MMM.DD");
  10. ? s;
  11.  
  12. s = asString(date(),"MMM DD/YY");
  13. ? s;
  14.  
  15. d = asDate(s,"MMM DD/YY");
  16. ? d;
  17.  
  18. j = asJulian(date());
  19. ? j;
  20.  
  21. d1 = date();
  22. d2 = 5/1/1990;
  23.  
  24. ? d2 < d1;
  25. ? d2 > d1;
  26. ? d1 == d2;
  27.